To create a web page presentation using R Markdown that features a plot created with Plotly and then host the webpage on either GitHub Pages, RPubs, or NeoCities. The webpage must contain the date that you created the document, and it must contain a plot created with Plotly.

We have plotted 3 plots
1. Simple plot using Diamond Dataset
2. Another plot also Using Diamond Dataset
3. Using MPG Dataset

This plot shows a histogram of different "cut" of diamonds in the dataset. Y axis shows number of such type of diomond

This plot uses diomond dataset. We sample 1000 rows from it and plot a scatter plot with - x axis = Carat - y axis = Price - Categorise based on "cut" - And size depends on the carat size

mycolors = c('red','blue','green','brown','cyan')
plot_ly(d, y = ~price, x = ~carat,color = ~factor(cut), 
        colors = mycolors, 
        text = ~paste("Price: ", price, '$<br>Cut:', cut)
        ,mode = 'markers',marker = list(size = ~carat*5, opacity = 0.5)
        )

This is the code for generating a bubble plot from mpg data with x-axis is weight of car, y-axis is "mpg" , size of bubble shows cylinder size and colored based on the type of engine - 0:Manual, 1:Autoomatic

data("mtcars")
d <- mtcars
mycolors = c('red','blue')
plot_ly(d,y = ~mpg,x = ~wt, color = ~factor(am),
        text = ~paste("Cylinder: ",cyl),
        colors = mycolors, mode = 'markers',marker = list(size = ~cyl*3, opacity = 0.5))